home *** CD-ROM | disk | FTP | other *** search
/ PC World 2007 March / PCWorld_2007-03_cd.bin / domacnost a kancelar / scribus / scribus-1.3.3.7-win32-install.exe / tcl / tix8.1 / tclIndex < prev    next >
Text File  |  2001-11-06  |  40KB  |  524 lines

  1. # Tcl autoload index file, version 2.0
  2. # This file is generated by the "tixindex" program,
  3. # *NOT* by the "auto_mkindex" command,
  4. # and sourced to set up indexing information for one or
  5. # more commands.  Typically each line is a command that
  6. # sets an element in the auto_index array, where the
  7. # element name is the name of a command and the value is
  8. # a script that loads the command.
  9.  
  10. set auto_index(tixBalloon) [list source [file join $dir Balloon.tcl]]
  11. set auto_index(tixBalloon:AutoLoad) [list source [file join $dir Balloon.tcl]]
  12. set auto_index(tixBalloon_XXMotion) [list source [file join $dir Balloon.tcl]]
  13. set auto_index(tixBalloon_XXButton) [list source [file join $dir Balloon.tcl]]
  14. set auto_index(tixBalloon_XXButtonUp) [list source [file join $dir Balloon.tcl]]
  15. set auto_index(tixIsDescendant) [list source [file join $dir Balloon.tcl]]
  16. set auto_index(tixBalIgnoreWhenGrabbed) [list source [file join $dir Balloon.tcl]]
  17. set auto_index(tixButtonBox) [list source [file join $dir BtnBox.tcl]]
  18. set auto_index(tixButtonBox:AutoLoad) [list source [file join $dir BtnBox.tcl]]
  19. set auto_index(tixCObjView) [list source [file join $dir CObjView.tcl]]
  20. set auto_index(tixCObjView:AutoLoad) [list source [file join $dir CObjView.tcl]]
  21. set auto_index(tixCheckList) [list source [file join $dir ChkList.tcl]]
  22. set auto_index(tixCheckList:AutoLoad) [list source [file join $dir ChkList.tcl]]
  23. set auto_index(tixComboBox) [list source [file join $dir ComboBox.tcl]]
  24. set auto_index(tixComboBox:AutoLoad) [list source [file join $dir ComboBox.tcl]]
  25. set auto_index(tixComboBoxBind) [list source [file join $dir ComboBox.tcl]]
  26. set auto_index(tixDlgBtns) [list source [file join $dir Compat.tcl]]
  27. set auto_index(tixStdDlgBtns) [list source [file join $dir Compat.tcl]]
  28. set auto_index(tixCombobox) [list source [file join $dir Compat.tcl]]
  29. set auto_index(tixFileSelectbox) [list source [file join $dir Compat.tcl]]
  30. set auto_index(tixScrolledListbox) [list source [file join $dir Compat.tcl]]
  31. set auto_index(tixInit) [list source [file join $dir Compat.tcl]]
  32. set auto_index(tixConsoleEvalAppend) [list source [file join $dir Console.tcl]]
  33. set auto_index(tixConsoleAppendToolbar) [list source [file join $dir Console.tcl]]
  34. set auto_index(tixConsoleInit) [list source [file join $dir Console.tcl]]
  35. set auto_index(tixConsoleSetFont) [list source [file join $dir Console.tcl]]
  36. set auto_index(tixConsoleInvoke) [list source [file join $dir Console.tcl]]
  37. set auto_index(tixConsoleHistory) [list source [file join $dir Console.tcl]]
  38. set auto_index(tixConsolePrompt) [list source [file join $dir Console.tcl]]
  39. set auto_index(tixConsoleBind) [list source [file join $dir Console.tcl]]
  40. set auto_index(tixConsoleInsert) [list source [file join $dir Console.tcl]]
  41. set auto_index(tixConsoleOutput) [list source [file join $dir Console.tcl]]
  42. set auto_index(tixConsoleExit) [list source [file join $dir Console.tcl]]
  43. set auto_index(tixControl) [list source [file join $dir Control.tcl]]
  44. set auto_index(tixControl:AutoLoad) [list source [file join $dir Control.tcl]]
  45. set auto_index(tixControlBind) [list source [file join $dir Control.tcl]]
  46. set auto_index(tixSetDefaultFontset) [list source [file join $dir DefSchm.tcl]]
  47. set auto_index(tixSetDefaultScheme-Color) [list source [file join $dir DefSchm.tcl]]
  48. set auto_index(tixSetDefaultScheme-Mono) [list source [file join $dir DefSchm.tcl]]
  49. set auto_index(tixDialogShell) [list source [file join $dir DialogS.tcl]]
  50. set auto_index(tixDialogShell:AutoLoad) [list source [file join $dir DialogS.tcl]]
  51. set auto_index(tixDirSelectBox) [list source [file join $dir DirBox.tcl]]
  52. set auto_index(tixDirSelectBox:AutoLoad) [list source [file join $dir DirBox.tcl]]
  53. set auto_index(tixDirSelectDialog) [list source [file join $dir DirDlg.tcl]]
  54. set auto_index(tixDirSelectDialog:AutoLoad) [list source [file join $dir DirDlg.tcl]]
  55. set auto_index(tixDirList) [list source [file join $dir DirList.tcl]]
  56. set auto_index(tixDirList:AutoLoad) [list source [file join $dir DirList.tcl]]
  57. set auto_index(tixDirTree) [list source [file join $dir DirTree.tcl]]
  58. set auto_index(tixDirTree:AutoLoad) [list source [file join $dir DirTree.tcl]]
  59. set auto_index(tixDragDropContext) [list source [file join $dir DragDrop.tcl]]
  60. set auto_index(tixDragDropContext:AutoLoad) [list source [file join $dir DragDrop.tcl]]
  61. set auto_index(tixGetDragDropContext) [list source [file join $dir DragDrop.tcl]]
  62. set auto_index(tixDropBind) [list source [file join $dir DragDrop.tcl]]
  63. set auto_index(tixDropBindTags) [list source [file join $dir DragDrop.tcl]]
  64. set auto_index(tixDetailList) [list source [file join $dir DtlList.tcl]]
  65. set auto_index(tixDetailList:AutoLoad) [list source [file join $dir DtlList.tcl]]
  66. set auto_index(tixExFileSelectBox) [list source [file join $dir EFileBox.tcl]]
  67. set auto_index(tixExFileSelectBox:AutoLoad) [list source [file join $dir EFileBox.tcl]]
  68. set auto_index(tixExFileSelectDialog) [list source [file join $dir EFileDlg.tcl]]
  69. set auto_index(tixExFileSelectDialog:AutoLoad) [list source [file join $dir EFileDlg.tcl]]
  70. set auto_index(tixBind) [list source [file join $dir Event.tcl]]
  71. set auto_index(tixPushEventStack) [list source [file join $dir Event.tcl]]
  72. set auto_index(tixPopEventStack) [list source [file join $dir Event.tcl]]
  73. set auto_index(_tixRecordFlags) [list source [file join $dir Event.tcl]]
  74. set auto_index(_tixDeleteFlags) [list source [file join $dir Event.tcl]]
  75. set auto_index(tixEvalCmdBinding) [list source [file join $dir Event.tcl]]
  76. set auto_index(tixEvent) [list source [file join $dir Event.tcl]]
  77. set auto_index(tixBuiltInCmdErrorHandler) [list source [file join $dir Event.tcl]]
  78. set auto_index(tixFileSelectBox) [list source [file join $dir FileBox.tcl]]
  79. set auto_index(tixFileSelectBox:AutoLoad) [list source [file join $dir FileBox.tcl]]
  80. set auto_index(tixMkFileDialog) [list source [file join $dir FileBox.tcl]]
  81. set auto_index(tixFileComboBox) [list source [file join $dir FileCbx.tcl]]
  82. set auto_index(tixFileComboBox:AutoLoad) [list source [file join $dir FileCbx.tcl]]
  83. set auto_index(tixFileResolveName) [list source [file join $dir FileCmpt.tcl]]
  84. set auto_index(tixNSubFolder) [list source [file join $dir FileCmpt.tcl]]
  85. set auto_index(tixFileSelectDialog) [list source [file join $dir FileDlg.tcl]]
  86. set auto_index(tixFileSelectDialog:AutoLoad) [list source [file join $dir FileDlg.tcl]]
  87. set auto_index(tixFileEntry) [list source [file join $dir FileEnt.tcl]]
  88. set auto_index(tixFileEntry:AutoLoad) [list source [file join $dir FileEnt.tcl]]
  89. set auto_index(tixResolveDir) [list source [file join $dir FileUtil.tcl]]
  90. set auto_index(tixCompressDotDot) [list source [file join $dir FileUtil.tcl]]
  91. set auto_index(tixFloatEntry) [list source [file join $dir FloatEnt.tcl]]
  92. set auto_index(tixFloatEntry:AutoLoad) [list source [file join $dir FloatEnt.tcl]]
  93. set auto_index(tixFloatEntryBind) [list source [file join $dir FloatEnt.tcl]]
  94. set auto_index(tixGridBind) [list source [file join $dir Grid.tcl]]
  95. set auto_index(tixGrid:Button-1) [list source [file join $dir Grid.tcl]]
  96. set auto_index(tixGrid:Shift-Button-1) [list source [file join $dir Grid.tcl]]
  97. set auto_index(tixGrid:Control-Button-1) [list source [file join $dir Grid.tcl]]
  98. set auto_index(tixGrid:ButtonRelease-1) [list source [file join $dir Grid.tcl]]
  99. set auto_index(tixGrid:B1-Motion) [list source [file join $dir Grid.tcl]]
  100. set auto_index(tixGrid:Control-B1-Motion) [list source [file join $dir Grid.tcl]]
  101. set auto_index(tixGrid:Double-1) [list source [file join $dir Grid.tcl]]
  102. set auto_index(tixGrid:B1-Leave) [list source [file join $dir Grid.tcl]]
  103. set auto_index(tixGrid:B1-Enter) [list source [file join $dir Grid.tcl]]
  104. set auto_index(tixGrid:Control-B1-Leave) [list source [file join $dir Grid.tcl]]
  105. set auto_index(tixGrid:Control-B1-Enter) [list source [file join $dir Grid.tcl]]
  106. set auto_index(tixGrid:AutoScan) [list source [file join $dir Grid.tcl]]
  107. set auto_index(tixGrid:DirKey) [list source [file join $dir Grid.tcl]]
  108. set auto_index(tixGrid:Return) [list source [file join $dir Grid.tcl]]
  109. set auto_index(tixGrid:Space) [list source [file join $dir Grid.tcl]]
  110. set auto_index(tixGrid:GetState) [list source [file join $dir Grid.tcl]]
  111. set auto_index(tixGrid:SetState) [list source [file join $dir Grid.tcl]]
  112. set auto_index(tixGrid:GoState) [list source [file join $dir Grid.tcl]]
  113. set auto_index(tixGrid:SelectSingle) [list source [file join $dir Grid.tcl]]
  114. set auto_index(tixGrid:GoState-0) [list source [file join $dir Grid.tcl]]
  115. set auto_index(tixGrid:GoState-1) [list source [file join $dir Grid.tcl]]
  116. set auto_index(tixGrid:GoState-2) [list source [file join $dir Grid.tcl]]
  117. set auto_index(tixGrid:GoState-3) [list source [file join $dir Grid.tcl]]
  118. set auto_index(tixGrid:GoState-5) [list source [file join $dir Grid.tcl]]
  119. set auto_index(tixGrid:GoState-4) [list source [file join $dir Grid.tcl]]
  120. set auto_index(tixGrid:GoState-s5) [list source [file join $dir Grid.tcl]]
  121. set auto_index(tixGrid:GoState-s6) [list source [file join $dir Grid.tcl]]
  122. set auto_index(tixGrid:GoState-s7) [list source [file join $dir Grid.tcl]]
  123. set auto_index(tixGrid:GoState-s8) [list source [file join $dir Grid.tcl]]
  124. set auto_index(tixGrid:GoState-s9) [list source [file join $dir Grid.tcl]]
  125. set auto_index(tixGrid:GoState-s10) [list source [file join $dir Grid.tcl]]
  126. set auto_index(tixGrid:GoState-b0) [list source [file join $dir Grid.tcl]]
  127. set auto_index(tixGrid:GoState-b1) [list source [file join $dir Grid.tcl]]
  128. set auto_index(tixGrid:GoState-b2) [list source [file join $dir Grid.tcl]]
  129. set auto_index(tixGrid:GoState-b3) [list source [file join $dir Grid.tcl]]
  130. set auto_index(tixGrid:GoState-b4) [list source [file join $dir Grid.tcl]]
  131. set auto_index(tixGrid:GoState-b5) [list source [file join $dir Grid.tcl]]
  132. set auto_index(tixGrid:GoState-b6) [list source [file join $dir Grid.tcl]]
  133. set auto_index(tixGrid:GoState-b7) [list source [file join $dir Grid.tcl]]
  134. set auto_index(tixGrid:GoState-b8) [list source [file join $dir Grid.tcl]]
  135. set auto_index(tixGrid:GoState-b9) [list source [file join $dir Grid.tcl]]
  136. set auto_index(tixGrid:GoState-b10) [list source [file join $dir Grid.tcl]]
  137. set auto_index(tixGrid:GoState-m0) [list source [file join $dir Grid.tcl]]
  138. set auto_index(tixGrid:GoState-m1) [list source [file join $dir Grid.tcl]]
  139. set auto_index(tixGrid:GoState-m2) [list source [file join $dir Grid.tcl]]
  140. set auto_index(tixGrid:GoState-m3) [list source [file join $dir Grid.tcl]]
  141. set auto_index(tixGrid:GoState-m4) [list source [file join $dir Grid.tcl]]
  142. set auto_index(tixGrid:GoState-m5) [list source [file join $dir Grid.tcl]]
  143. set auto_index(tixGrid:GoState-m6) [list source [file join $dir Grid.tcl]]
  144. set auto_index(tixGrid:GoState-m7) [list source [file join $dir Grid.tcl]]
  145. set auto_index(tixGrid:GoState-m8) [list source [file join $dir Grid.tcl]]
  146. set auto_index(tixGrid:GoState-m9) [list source [file join $dir Grid.tcl]]
  147. set auto_index(tixGrid:GoState-xm7) [list source [file join $dir Grid.tcl]]
  148. set auto_index(tixGrid:GoState-e0) [list source [file join $dir Grid.tcl]]
  149. set auto_index(tixGrid:GoState-e1) [list source [file join $dir Grid.tcl]]
  150. set auto_index(tixGrid:GoState-e2) [list source [file join $dir Grid.tcl]]
  151. set auto_index(tixGrid:GoState-e3) [list source [file join $dir Grid.tcl]]
  152. set auto_index(tixGrid:GoState-e4) [list source [file join $dir Grid.tcl]]
  153. set auto_index(tixGrid:GoState-e5) [list source [file join $dir Grid.tcl]]
  154. set auto_index(tixGrid:GoState-e6) [list source [file join $dir Grid.tcl]]
  155. set auto_index(tixGrid:GoState-e7) [list source [file join $dir Grid.tcl]]
  156. set auto_index(tixGrid:GoState-e8) [list source [file join $dir Grid.tcl]]
  157. set auto_index(tixGrid:GoState-e9) [list source [file join $dir Grid.tcl]]
  158. set auto_index(tixGrid:GoState-e10) [list source [file join $dir Grid.tcl]]
  159. set auto_index(tixGrid:GoState-xm7) [list source [file join $dir Grid.tcl]]
  160. set auto_index(tixGrid:GoState-12) [list source [file join $dir Grid.tcl]]
  161. set auto_index(tixGrid:GoState-13) [list source [file join $dir Grid.tcl]]
  162. set auto_index(tixGrid:GoState-14) [list source [file join $dir Grid.tcl]]
  163. set auto_index(tixGrid:GoState-16) [list source [file join $dir Grid.tcl]]
  164. set auto_index(tixGrid:GoState-18) [list source [file join $dir Grid.tcl]]
  165. set auto_index(tixGrid:GoState-20) [list source [file join $dir Grid.tcl]]
  166. set auto_index(tixGrid:GoState-21) [list source [file join $dir Grid.tcl]]
  167. set auto_index(tixGrid:GoState-22) [list source [file join $dir Grid.tcl]]
  168. set auto_index(tixGrid:SetAnchor) [list source [file join $dir Grid.tcl]]
  169. set auto_index(tixGrid:Select) [list source [file join $dir Grid.tcl]]
  170. set auto_index(tixGrid:StartScan) [list source [file join $dir Grid.tcl]]
  171. set auto_index(tixGrid:DoScan) [list source [file join $dir Grid.tcl]]
  172. set auto_index(tixGrid:CallBrowseCmd) [list source [file join $dir Grid.tcl]]
  173. set auto_index(tixGrid:CallCommand) [list source [file join $dir Grid.tcl]]
  174. set auto_index(tixGrid:EditCell) [list source [file join $dir Grid.tcl]]
  175. set auto_index(tixGrid:EditApply) [list source [file join $dir Grid.tcl]]
  176. set auto_index(tixGrid:CheckEdit) [list source [file join $dir Grid.tcl]]
  177. set auto_index(tixGrid:SetEdit) [list source [file join $dir Grid.tcl]]
  178. set auto_index(tixGrid:DoneEdit) [list source [file join $dir Grid.tcl]]
  179. set auto_index(tixGrid:SetFocus) [list source [file join $dir Grid.tcl]]
  180. set auto_index(tixHListBind) [list source [file join $dir HList.tcl]]
  181. set auto_index(tixHList:Keyboard-Activate) [list source [file join $dir HList.tcl]]
  182. set auto_index(tixHList:Keyboard-Browse) [list source [file join $dir HList.tcl]]
  183. set auto_index(tixHList:LeftRight) [list source [file join $dir HList.tcl]]
  184. set auto_index(tixHList:UpDown) [list source [file join $dir HList.tcl]]
  185. set auto_index(tixHList:Button-1) [list source [file join $dir HList.tcl]]
  186. set auto_index(tixHList:ButtonRelease-1) [list source [file join $dir HList.tcl]]
  187. set auto_index(tixHList:Double-1) [list source [file join $dir HList.tcl]]
  188. set auto_index(tixHList:B1-Motion) [list source [file join $dir HList.tcl]]
  189. set auto_index(tixHList:B1-Leave) [list source [file join $dir HList.tcl]]
  190. set auto_index(tixHList:B1-Enter) [list source [file join $dir HList.tcl]]
  191. set auto_index(tixHList:AutoScan) [list source [file join $dir HList.tcl]]
  192. set auto_index(tixHList:GetState) [list source [file join $dir HList.tcl]]
  193. set auto_index(tixHList:SetState) [list source [file join $dir HList.tcl]]
  194. set auto_index(tixHList:GoState) [list source [file join $dir HList.tcl]]
  195. set auto_index(tixHList:GoState-0) [list source [file join $dir HList.tcl]]
  196. set auto_index(tixHList:GoState-1) [list source [file join $dir HList.tcl]]
  197. set auto_index(tixHList:GoState-5) [list source [file join $dir HList.tcl]]
  198. set auto_index(tixHList:GoState-6) [list source [file join $dir HList.tcl]]
  199. set auto_index(tixHList:GoState-10) [list source [file join $dir HList.tcl]]
  200. set auto_index(tixHList:GoState-11) [list source [file join $dir HList.tcl]]
  201. set auto_index(tixHList:GoState-12) [list source [file join $dir HList.tcl]]
  202. set auto_index(tixHList:GoState-13) [list source [file join $dir HList.tcl]]
  203. set auto_index(tixHList:GoState-14) [list source [file join $dir HList.tcl]]
  204. set auto_index(tixHList:GoState-16) [list source [file join $dir HList.tcl]]
  205. set auto_index(tixHList:GoState-18) [list source [file join $dir HList.tcl]]
  206. set auto_index(tixHList:GoState-20) [list source [file join $dir HList.tcl]]
  207. set auto_index(tixHList:GoState-21) [list source [file join $dir HList.tcl]]
  208. set auto_index(tixHList:GoState-22) [list source [file join $dir HList.tcl]]
  209. set auto_index(tixHList:GoState-23) [list source [file join $dir HList.tcl]]
  210. set auto_index(tixHList:GoState-24) [list source [file join $dir HList.tcl]]
  211. set auto_index(tixHList:GoState-25) [list source [file join $dir HList.tcl]]
  212. set auto_index(tixHList:GoState-26) [list source [file join $dir HList.tcl]]
  213. set auto_index(tixHList:GoState-27) [list source [file join $dir HList.tcl]]
  214. set auto_index(tixHList:GoState-28) [list source [file join $dir HList.tcl]]
  215. set auto_index(tixHList:GoState-29) [list source [file join $dir HList.tcl]]
  216. set auto_index(tixHList:GoState-30) [list source [file join $dir HList.tcl]]
  217. set auto_index(tixHList:GoState-31) [list source [file join $dir HList.tcl]]
  218. set auto_index(tixHList:GoState-32) [list source [file join $dir HList.tcl]]
  219. set auto_index(tixHList:GoState-33) [list source [file join $dir HList.tcl]]
  220. set auto_index(tixHList:GetNearest) [list source [file join $dir HList.tcl]]
  221. set auto_index(tixHList:SetAnchor) [list source [file join $dir HList.tcl]]
  222. set auto_index(tixHList:Select) [list source [file join $dir HList.tcl]]
  223. set auto_index(tixHList:StartScan) [list source [file join $dir HList.tcl]]
  224. set auto_index(tixHList:DoScan) [list source [file join $dir HList.tcl]]
  225. set auto_index(tixHList:CallIndicatorCmd) [list source [file join $dir HList.tcl]]
  226. set auto_index(tixHList:InsideArmedIndicator) [list source [file join $dir HList.tcl]]
  227. set auto_index(tixHList:Browse) [list source [file join $dir HList.tcl]]
  228. set auto_index(tixHListSingle:DragTimer) [list source [file join $dir HListDD.tcl]]
  229. set auto_index(tixHListSingle:Send:WaitDrag) [list source [file join $dir HListDD.tcl]]
  230. set auto_index(tixHListSingle:Send:StartDrag) [list source [file join $dir HListDD.tcl]]
  231. set auto_index(tixHListSingle:Send:DoneDrag) [list source [file join $dir HListDD.tcl]]
  232. set auto_index(tixHListSingle:Send:Cmd) [list source [file join $dir HListDD.tcl]]
  233. set auto_index(tixHListSingle:Rec:DragOver) [list source [file join $dir HListDD.tcl]]
  234. set auto_index(tixHListSingle:Rec:DragIn) [list source [file join $dir HListDD.tcl]]
  235. set auto_index(tixHListSingle:Rec:DragOut) [list source [file join $dir HListDD.tcl]]
  236. set auto_index(tixHListSingle:Rec:Drop) [list source [file join $dir HListDD.tcl]]
  237. set auto_index(tixIconView) [list source [file join $dir IconView.tcl]]
  238. set auto_index(tixIconView:AutoLoad) [list source [file join $dir IconView.tcl]]
  239. set auto_index(__tixError) [list source [file join $dir Init.tcl]]
  240. set auto_index(__tixInit) [list source [file join $dir Init.tcl]]
  241. set auto_index(tixLabelEntry) [list source [file join $dir LabEntry.tcl]]
  242. set auto_index(tixLabelEntry:AutoLoad) [list source [file join $dir LabEntry.tcl]]
  243. set auto_index(tixLabelEntryBind) [list source [file join $dir LabEntry.tcl]]
  244. set auto_index(tixLabelFrame) [list source [file join $dir LabFrame.tcl]]
  245. set auto_index(tixLabelFrame:AutoLoad) [list source [file join $dir LabFrame.tcl]]
  246. set auto_index(tixLabelWidget) [list source [file join $dir LabWidg.tcl]]
  247. set auto_index(tixLabelWidget:AutoLoad) [list source [file join $dir LabWidg.tcl]]
  248. set auto_index(tixListNoteBook) [list source [file join $dir ListNBk.tcl]]
  249. set auto_index(tixListNoteBook:AutoLoad) [list source [file join $dir ListNBk.tcl]]
  250. set auto_index(tixMeter) [list source [file join $dir Meter.tcl]]
  251. set auto_index(tixMeter:AutoLoad) [list source [file join $dir Meter.tcl]]
  252. set auto_index(tixMultiView) [list source [file join $dir MultView.tcl]]
  253. set auto_index(tixMultiView:AutoLoad) [list source [file join $dir MultView.tcl]]
  254. set auto_index(tixNoteBook) [list source [file join $dir NoteBook.tcl]]
  255. set auto_index(tixNoteBook:AutoLoad) [list source [file join $dir NoteBook.tcl]]
  256. set auto_index(tixNoteBookFind) [list source [file join $dir NoteBook.tcl]]
  257. set auto_index(tixTraverseToNoteBook) [list source [file join $dir NoteBook.tcl]]
  258. set auto_index(setenv) [list source [file join $dir OldUtil.tcl]]
  259. set auto_index(tixSetEntry) [list source [file join $dir OldUtil.tcl]]
  260. set auto_index(tixListGetSingle) [list source [file join $dir OldUtil.tcl]]
  261. set auto_index(tixDialogRestore) [list source [file join $dir OldUtil.tcl]]
  262. set auto_index(tixDialogWithdraw) [list source [file join $dir OldUtil.tcl]]
  263. set auto_index(tixDialogDestroy) [list source [file join $dir OldUtil.tcl]]
  264. set auto_index(tixQueryAppResource) [list source [file join $dir OldUtil.tcl]]
  265. set auto_index(tixCreateToplevel) [list source [file join $dir OldUtil.tcl]]
  266. set auto_index(_tixToplevelDestroy) [list source [file join $dir OldUtil.tcl]]
  267. set auto_index(_tixToplevelUnmap) [list source [file join $dir OldUtil.tcl]]
  268. set auto_index(_tixToplevelMap) [list source [file join $dir OldUtil.tcl]]
  269. set auto_index(_tixToplevelVisibility) [list source [file join $dir OldUtil.tcl]]
  270. set auto_index(tixCreateDialogShell) [list source [file join $dir OldUtil.tcl]]
  271. set auto_index(_tixDialogDestroy) [list source [file join $dir OldUtil.tcl]]
  272. set auto_index(_tixInitMainWindow) [list source [file join $dir OldUtil.tcl]]
  273. set auto_index(tixOptionMenu) [list source [file join $dir OptMenu.tcl]]
  274. set auto_index(tixOptionMenu:AutoLoad) [list source [file join $dir OptMenu.tcl]]
  275. set auto_index(tixPanedWindow) [list source [file join $dir PanedWin.tcl]]
  276. set auto_index(tixPanedWindow:AutoLoad) [list source [file join $dir PanedWin.tcl]]
  277. set auto_index(tixPopupMenu) [list source [file join $dir PopMenu.tcl]]
  278. set auto_index(tixPopupMenu:AutoLoad) [list source [file join $dir PopMenu.tcl]]
  279. set auto_index(tixPrimitive) [list source [file join $dir Primitiv.tcl]]
  280. set auto_index(tixPrimitive:AutoLoad) [list source [file join $dir Primitiv.tcl]]
  281. set auto_index(tixResizeHandle) [list source [file join $dir ResizeH.tcl]]
  282. set auto_index(tixResizeHandle:AutoLoad) [list source [file join $dir ResizeH.tcl]]
  283. set auto_index(tixDeleteBindTag) [list source [file join $dir ResizeH.tcl]]
  284. set auto_index(tixAddBindTag) [list source [file join $dir ResizeH.tcl]]
  285. set auto_index(tixScrolledGrid) [list source [file join $dir SGrid.tcl]]
  286. set auto_index(tixScrolledGrid:AutoLoad) [list source [file join $dir SGrid.tcl]]
  287. set auto_index(tixScrolledGridBind) [list source [file join $dir SGrid.tcl]]
  288. set auto_index(tixScrolledHList) [list source [file join $dir SHList.tcl]]
  289. set auto_index(tixScrolledHList:AutoLoad) [list source [file join $dir SHList.tcl]]
  290. set auto_index(tixScrolledListBox) [list source [file join $dir SListBox.tcl]]
  291. set auto_index(tixScrolledListBox:AutoLoad) [list source [file join $dir SListBox.tcl]]
  292. set auto_index(tixScrolledListBoxBind) [list source [file join $dir SListBox.tcl]]
  293. set auto_index(tixScrolledTList) [list source [file join $dir STList.tcl]]
  294. set auto_index(tixScrolledTList:AutoLoad) [list source [file join $dir STList.tcl]]
  295. set auto_index(tixScrolledText) [list source [file join $dir SText.tcl]]
  296. set auto_index(tixScrolledText:AutoLoad) [list source [file join $dir SText.tcl]]
  297. set auto_index(tixScrolledWidget) [list source [file join $dir SWidget.tcl]]
  298. set auto_index(tixScrolledWidget:AutoLoad) [list source [file join $dir SWidget.tcl]]
  299. set auto_index(tixScrolledWindow) [list source [file join $dir SWindow.tcl]]
  300. set auto_index(tixScrolledWindow:AutoLoad) [list source [file join $dir SWindow.tcl]]
  301. set auto_index(tixSelect) [list source [file join $dir Select.tcl]]
  302. set auto_index(tixSelect:AutoLoad) [list source [file join $dir Select.tcl]]
  303. set auto_index(tixShell) [list source [file join $dir Shell.tcl]]
  304. set auto_index(tixShell:AutoLoad) [list source [file join $dir Shell.tcl]]
  305. set auto_index(tixSimpleDialog) [list source [file join $dir SimpDlg.tcl]]
  306. set auto_index(tixSimpleDialog:AutoLoad) [list source [file join $dir SimpDlg.tcl]]
  307. set auto_index(tixStackWindow) [list source [file join $dir StackWin.tcl]]
  308. set auto_index(tixStackWindow:AutoLoad) [list source [file join $dir StackWin.tcl]]
  309. set auto_index(tixStatusBar) [list source [file join $dir StatBar.tcl]]
  310. set auto_index(tixStatusBar:AutoLoad) [list source [file join $dir StatBar.tcl]]
  311. set auto_index(tixStdButtonBox) [list source [file join $dir StdBBox.tcl]]
  312. set auto_index(tixStdButtonBox:AutoLoad) [list source [file join $dir StdBBox.tcl]]
  313. set auto_index(tixStdDialogShell) [list source [file join $dir StdShell.tcl]]
  314. set auto_index(tixStdDialogShell:AutoLoad) [list source [file join $dir StdShell.tcl]]
  315. set auto_index(tixTListBind) [list source [file join $dir TList.tcl]]
  316. set auto_index(tixTList:Button-1) [list source [file join $dir TList.tcl]]
  317. set auto_index(tixTList:Shift-Button-1) [list source [file join $dir TList.tcl]]
  318. set auto_index(tixTList:Control-Button-1) [list source [file join $dir TList.tcl]]
  319. set auto_index(tixTList:ButtonRelease-1) [list source [file join $dir TList.tcl]]
  320. set auto_index(tixTList:B1-Motion) [list source [file join $dir TList.tcl]]
  321. set auto_index(tixTList:Control-B1-Motion) [list source [file join $dir TList.tcl]]
  322. set auto_index(tixTList:Double-1) [list source [file join $dir TList.tcl]]
  323. set auto_index(tixTList:B1-Leave) [list source [file join $dir TList.tcl]]
  324. set auto_index(tixTList:B1-Enter) [list source [file join $dir TList.tcl]]
  325. set auto_index(tixTList:Control-B1-Leave) [list source [file join $dir TList.tcl]]
  326. set auto_index(tixTList:Control-B1-Enter) [list source [file join $dir TList.tcl]]
  327. set auto_index(tixTList:AutoScan) [list source [file join $dir TList.tcl]]
  328. set auto_index(tixTList:DirKey) [list source [file join $dir TList.tcl]]
  329. set auto_index(tixTList:Return) [list source [file join $dir TList.tcl]]
  330. set auto_index(tixTList:Space) [list source [file join $dir TList.tcl]]
  331. set auto_index(tixTList:GetState) [list source [file join $dir TList.tcl]]
  332. set auto_index(tixTList:SetState) [list source [file join $dir TList.tcl]]
  333. set auto_index(tixTList:GoState) [list source [file join $dir TList.tcl]]
  334. set auto_index(tixTList:GoState-s0) [list source [file join $dir TList.tcl]]
  335. set auto_index(tixTList:GoState-s1) [list source [file join $dir TList.tcl]]
  336. set auto_index(tixTList:GoState-s2) [list source [file join $dir TList.tcl]]
  337. set auto_index(tixTList:GoState-s3) [list source [file join $dir TList.tcl]]
  338. set auto_index(tixTList:GoState-s4) [list source [file join $dir TList.tcl]]
  339. set auto_index(tixTList:GoState-s5) [list source [file join $dir TList.tcl]]
  340. set auto_index(tixTList:GoState-s6) [list source [file join $dir TList.tcl]]
  341. set auto_index(tixTList:GoState-s7) [list source [file join $dir TList.tcl]]
  342. set auto_index(tixTList:GoState-s8) [list source [file join $dir TList.tcl]]
  343. set auto_index(tixTList:GoState-s9) [list source [file join $dir TList.tcl]]
  344. set auto_index(tixTList:GoState-s10) [list source [file join $dir TList.tcl]]
  345. set auto_index(tixTList:GoState-b0) [list source [file join $dir TList.tcl]]
  346. set auto_index(tixTList:GoState-b1) [list source [file join $dir TList.tcl]]
  347. set auto_index(tixTList:GoState-b2) [list source [file join $dir TList.tcl]]
  348. set auto_index(tixTList:GoState-b3) [list source [file join $dir TList.tcl]]
  349. set auto_index(tixTList:GoState-b4) [list source [file join $dir TList.tcl]]
  350. set auto_index(tixTList:GoState-b5) [list source [file join $dir TList.tcl]]
  351. set auto_index(tixTList:GoState-b6) [list source [file join $dir TList.tcl]]
  352. set auto_index(tixTList:GoState-b7) [list source [file join $dir TList.tcl]]
  353. set auto_index(tixTList:GoState-b8) [list source [file join $dir TList.tcl]]
  354. set auto_index(tixTList:GoState-b9) [list source [file join $dir TList.tcl]]
  355. set auto_index(tixTList:GoState-b10) [list source [file join $dir TList.tcl]]
  356. set auto_index(tixTList:GoState-m0) [list source [file join $dir TList.tcl]]
  357. set auto_index(tixTList:GoState-m1) [list source [file join $dir TList.tcl]]
  358. set auto_index(tixTList:GoState-m2) [list source [file join $dir TList.tcl]]
  359. set auto_index(tixTList:GoState-m3) [list source [file join $dir TList.tcl]]
  360. set auto_index(tixTList:GoState-m4) [list source [file join $dir TList.tcl]]
  361. set auto_index(tixTList:GoState-m5) [list source [file join $dir TList.tcl]]
  362. set auto_index(tixTList:GoState-m6) [list source [file join $dir TList.tcl]]
  363. set auto_index(tixTList:GoState-m7) [list source [file join $dir TList.tcl]]
  364. set auto_index(tixTList:GoState-m8) [list source [file join $dir TList.tcl]]
  365. set auto_index(tixTList:GoState-m9) [list source [file join $dir TList.tcl]]
  366. set auto_index(tixTList:GoState-xm7) [list source [file join $dir TList.tcl]]
  367. set auto_index(tixTList:GoState-e0) [list source [file join $dir TList.tcl]]
  368. set auto_index(tixTList:GoState-e1) [list source [file join $dir TList.tcl]]
  369. set auto_index(tixTList:GoState-e2) [list source [file join $dir TList.tcl]]
  370. set auto_index(tixTList:GoState-e3) [list source [file join $dir TList.tcl]]
  371. set auto_index(tixTList:GoState-e4) [list source [file join $dir TList.tcl]]
  372. set auto_index(tixTList:GoState-e5) [list source [file join $dir TList.tcl]]
  373. set auto_index(tixTList:GoState-e6) [list source [file join $dir TList.tcl]]
  374. set auto_index(tixTList:GoState-e7) [list source [file join $dir TList.tcl]]
  375. set auto_index(tixTList:GoState-e8) [list source [file join $dir TList.tcl]]
  376. set auto_index(tixTList:GoState-e9) [list source [file join $dir TList.tcl]]
  377. set auto_index(tixTList:GoState-e10) [list source [file join $dir TList.tcl]]
  378. set auto_index(tixTList:GoState-xm7) [list source [file join $dir TList.tcl]]
  379. set auto_index(tixTList:GoState-12) [list source [file join $dir TList.tcl]]
  380. set auto_index(tixTList:GoState-13) [list source [file join $dir TList.tcl]]
  381. set auto_index(tixTList:GoState-14) [list source [file join $dir TList.tcl]]
  382. set auto_index(tixTList:GoState-16) [list source [file join $dir TList.tcl]]
  383. set auto_index(tixTList:GoState-18) [list source [file join $dir TList.tcl]]
  384. set auto_index(tixTList:GoState-20) [list source [file join $dir TList.tcl]]
  385. set auto_index(tixTList:GoState-21) [list source [file join $dir TList.tcl]]
  386. set auto_index(tixTList:GoState-22) [list source [file join $dir TList.tcl]]
  387. set auto_index(tixTList:SetAnchor) [list source [file join $dir TList.tcl]]
  388. set auto_index(tixTList:Select) [list source [file join $dir TList.tcl]]
  389. set auto_index(tixTList:StartScan) [list source [file join $dir TList.tcl]]
  390. set auto_index(tixTList:DoScan) [list source [file join $dir TList.tcl]]
  391. set auto_index(tixTList:CallBrowseCmd) [list source [file join $dir TList.tcl]]
  392. set auto_index(tixTList:CallCommand) [list source [file join $dir TList.tcl]]
  393. set auto_index(tix) [list source [file join $dir Tix.tcl]]
  394. set auto_index(tixAppContext) [list source [file join $dir Tix.tcl]]
  395. set auto_index(tixAppContext:AutoLoad) [list source [file join $dir Tix.tcl]]
  396. set auto_index(tixTree) [list source [file join $dir Tree.tcl]]
  397. set auto_index(tixTree:AutoLoad) [list source [file join $dir Tree.tcl]]
  398. set auto_index(tixInitFileCmpt:Unix) [list source [file join $dir UnixFile.tcl]]
  399. set auto_index(tixFSSplit) [list source [file join $dir UnixFile.tcl]]
  400. set auto_index(tixFSValid) [list source [file join $dir UnixFile.tcl]]
  401. set auto_index(tixFSSep) [list source [file join $dir UnixFile.tcl]]
  402. set auto_index(tixFSIntName) [list source [file join $dir UnixFile.tcl]]
  403. set auto_index(tixFSResolveName) [list source [file join $dir UnixFile.tcl]]
  404. set auto_index(tixFSListDir) [list source [file join $dir UnixFile.tcl]]
  405. set auto_index(_tixFSMakeList) [list source [file join $dir UnixFile.tcl]]
  406. set auto_index(tixDirSep) [list source [file join $dir UnixFile.tcl]]
  407. set auto_index(tixFSInfo) [list source [file join $dir UnixFile.tcl]]
  408. set auto_index(tixFileIntName) [list source [file join $dir UnixFile.tcl]]
  409. set auto_index(tixNativeName) [list source [file join $dir UnixFile.tcl]]
  410. set auto_index(tixFileDisplayName) [list source [file join $dir UnixFile.tcl]]
  411. set auto_index(tixFileSplit) [list source [file join $dir UnixFile.tcl]]
  412. set auto_index(tixSubFolder) [list source [file join $dir UnixFile.tcl]]
  413. set auto_index(tixListDir) [list source [file join $dir UnixFile.tcl]]
  414. set auto_index(tixRootDir) [list source [file join $dir UnixFile.tcl]]
  415. set auto_index(tixIsAbsPath) [list source [file join $dir UnixFile.tcl]]
  416. set auto_index(tixVerifyFile) [list source [file join $dir UnixFile.tcl]]
  417. set auto_index(tixFilePattern) [list source [file join $dir UnixFile.tcl]]
  418. set auto_index(tixHandleArgv) [list source [file join $dir Utils.tcl]]
  419. set auto_index(tixDisableAll) [list source [file join $dir Utils.tcl]]
  420. set auto_index(tixEnableAll) [list source [file join $dir Utils.tcl]]
  421. set auto_index(tixDescendants) [list source [file join $dir Utils.tcl]]
  422. set auto_index(tixForEach) [list source [file join $dir Utils.tcl]]
  423. set auto_index(tixTopLevel) [list source [file join $dir Utils.tcl]]
  424. set auto_index(tixInt_Expand) [list source [file join $dir Utils.tcl]]
  425. set auto_index(tixPConfig) [list source [file join $dir Utils.tcl]]
  426. set auto_index(tixAppendBindTag) [list source [file join $dir Utils.tcl]]
  427. set auto_index(tixAddBindTag) [list source [file join $dir Utils.tcl]]
  428. set auto_index(tixSubwidgetRef) [list source [file join $dir Utils.tcl]]
  429. set auto_index(tixSubwidgetRetCreate) [list source [file join $dir Utils.tcl]]
  430. set auto_index(tixSubwidgetRetDelete) [list source [file join $dir Utils.tcl]]
  431. set auto_index(tixListboxGetCurrent) [list source [file join $dir Utils.tcl]]
  432. set auto_index(tixSetMegaWidget) [list source [file join $dir Utils.tcl]]
  433. set auto_index(tixGetMegaWidget) [list source [file join $dir Utils.tcl]]
  434. set auto_index(tixUnsetMegaWidget) [list source [file join $dir Utils.tcl]]
  435. set auto_index(tixBusy) [list source [file join $dir Utils.tcl]]
  436. set auto_index(tixOptionName) [list source [file join $dir Utils.tcl]]
  437. set auto_index(tixSetSilent) [list source [file join $dir Utils.tcl]]
  438. set auto_index(tixSetChooser) [list source [file join $dir Utils.tcl]]
  439. set auto_index(tixBreak) [list source [file join $dir Utils.tcl]]
  440. set auto_index(tixDestroy) [list source [file join $dir Utils.tcl]]
  441. set auto_index(tixPushGrab) [list source [file join $dir Utils.tcl]]
  442. set auto_index(tixPopGrab) [list source [file join $dir Utils.tcl]]
  443. set auto_index(tixWithinWindow) [list source [file join $dir Utils.tcl]]
  444. set auto_index(tixWinWidth) [list source [file join $dir Utils.tcl]]
  445. set auto_index(tixWinHeight) [list source [file join $dir Utils.tcl]]
  446. set auto_index(tixWinCmd) [list source [file join $dir Utils.tcl]]
  447. set auto_index(tixVResize) [list source [file join $dir VResize.tcl]]
  448. set auto_index(tixVResize:AutoLoad) [list source [file join $dir VResize.tcl]]
  449. set auto_index(tixVStack) [list source [file join $dir VStack.tcl]]
  450. set auto_index(tixVStack:AutoLoad) [list source [file join $dir VStack.tcl]]
  451. set auto_index(tixVTree) [list source [file join $dir VTree.tcl]]
  452. set auto_index(tixVTree:AutoLoad) [list source [file join $dir VTree.tcl]]
  453. set auto_index(tixVariable:ConfigVariable) [list source [file join $dir Variable.tcl]]
  454. set auto_index(tixVariable:UpdateVariable) [list source [file join $dir Variable.tcl]]
  455. set auto_index(tixVariable:TraceProc) [list source [file join $dir Variable.tcl]]
  456. set auto_index(tixVariable:DeleteVariable) [list source [file join $dir Variable.tcl]]
  457. set auto_index(tixVerifyBoolean) [list source [file join $dir Verify.tcl]]
  458. set auto_index(tixVerifyDirectory) [list source [file join $dir Verify.tcl]]
  459. set auto_index(tixScriptVersion) [list source [file join $dir Version.tcl]]
  460. set auto_index(tixScriptPatchLevel) [list source [file join $dir Version.tcl]]
  461. set auto_index(tixWInfo) [list source [file join $dir WInfo.tcl]]
  462. set auto_index(tixInitFileCmpt:Win) [list source [file join $dir WinFile.tcl]]
  463. set auto_index(tixFSSplit) [list source [file join $dir WinFile.tcl]]
  464. set auto_index(tixFSValid) [list source [file join $dir WinFile.tcl]]
  465. set auto_index(tixFSIntName) [list source [file join $dir WinFile.tcl]]
  466. set auto_index(tixFSIntJoin) [list source [file join $dir WinFile.tcl]]
  467. set auto_index(tixFSJoin) [list source [file join $dir WinFile.tcl]]
  468. set auto_index(tixFSResolveName) [list source [file join $dir WinFile.tcl]]
  469. set auto_index(tixFSListDir) [list source [file join $dir WinFile.tcl]]
  470. set auto_index(tixFSMakeList) [list source [file join $dir WinFile.tcl]]
  471. set auto_index(tixFSSep) [list source [file join $dir WinFile.tcl]]
  472. set auto_index(tixFSGetDrives) [list source [file join $dir WinFile.tcl]]
  473. set auto_index(tixDirSep) [list source [file join $dir WinFile.tcl]]
  474. set auto_index(tixRootDir) [list source [file join $dir WinFile.tcl]]
  475. set auto_index(tixIsAbsPath) [list source [file join $dir WinFile.tcl]]
  476. set auto_index(tixWinGetFileDrive) [list source [file join $dir WinFile.tcl]]
  477. set auto_index(tixWinGetFilePath) [list source [file join $dir WinFile.tcl]]
  478. set auto_index(tixWinCurrentDrive) [list source [file join $dir WinFile.tcl]]
  479. set auto_index(tixWinGetPathFromDrive) [list source [file join $dir WinFile.tcl]]
  480. set auto_index(tixFileIntName) [list source [file join $dir WinFile.tcl]]
  481. set auto_index(tixNativeName) [list source [file join $dir WinFile.tcl]]
  482. set auto_index(tixFileDisplayName) [list source [file join $dir WinFile.tcl]]
  483. set auto_index(tixFileSplit) [list source [file join $dir WinFile.tcl]]
  484. set auto_index(tixSubFolder) [list source [file join $dir WinFile.tcl]]
  485. set auto_index(tixWinGetDrives) [list source [file join $dir WinFile.tcl]]
  486. set auto_index(tixListDir) [list source [file join $dir WinFile.tcl]]
  487. set auto_index(tixVerifyFile) [list source [file join $dir WinFile.tcl]]
  488. set auto_index(tixFilePattern) [list source [file join $dir WinFile.tcl]]
  489. set auto_index(tixWinFileEmu) [list source [file join $dir WinFile.tcl]]
  490. set auto_index(tixAssert) [list source [file join $dir fs.tcl]]
  491. set auto_index(tixAssertNorm) [list source [file join $dir fs.tcl]]
  492. set auto_index(tixAssertVPath) [list source [file join $dir fs.tcl]]
  493. set auto_index(tixFSAbsPath) [list source [file join $dir fs.tcl]]
  494. set auto_index(tixFSVPWD) [list source [file join $dir fs.tcl]]
  495. set auto_index(tixFSPWD) [list source [file join $dir fs.tcl]]
  496. set auto_index(tixFSDisplayName) [list source [file join $dir fs.tcl]]
  497. set auto_index(tixFSIsAbsPath) [list source [file join $dir fs.tcl]]
  498. set auto_index(tixFSIsNorm_os) [list source [file join $dir fs.tcl]]
  499. set auto_index(tixFSIsNorm) [list source [file join $dir fs.tcl]]
  500. set auto_index(tixFSIsValid) [list source [file join $dir fs.tcl]]
  501. set auto_index(tixFSIsVPath) [list source [file join $dir fs.tcl]]
  502. set auto_index(tixFSVPath) [list source [file join $dir fs.tcl]]
  503. set auto_index(tixFSPath) [list source [file join $dir fs.tcl]]
  504. set auto_index(tixFSTildeSubst) [list source [file join $dir fs.tcl]]
  505. set auto_index(tixFSNorm) [list source [file join $dir fs.tcl]]
  506. set auto_index(_tixJoin) [list source [file join $dir fs.tcl]]
  507. set auto_index(tixFSNormDir) [list source [file join $dir fs.tcl]]
  508. set auto_index(_tixNormalize) [list source [file join $dir fs.tcl]]
  509. set auto_index(tixFSCreateDirs) [list source [file join $dir fs.tcl]]
  510. set auto_index(tixFSPWD) [list source [file join $dir fs.tcl]]
  511. set auto_index(tixFSIsNorm) [list source [file join $dir fs.tcl]]
  512. set auto_index(tixFSNorm) [list source [file join $dir fs.tcl]]
  513. set auto_index(_tixJoin) [list source [file join $dir fs.tcl]]
  514. set auto_index(tixFSIsAbsPath) [list source [file join $dir fs.tcl]]
  515. set auto_index(tixFSIsNorm_os) [list source [file join $dir fs.tcl]]
  516. set auto_index(_tixNormalize) [list source [file join $dir fs.tcl]]
  517. set auto_index(tixFSNormDir) [list source [file join $dir fs.tcl]]
  518. set auto_index(tixPanic) [list source [file join $dir fs.tcl]]
  519. set auto_index(tixFSIsValid) [list source [file join $dir fs.tcl]]
  520. set auto_index(tixFSIsVPath) [list source [file join $dir fs.tcl]]
  521. set auto_index(tixFSVPath) [list source [file join $dir fs.tcl]]
  522. set auto_index(tixFSPath) [list source [file join $dir fs.tcl]]
  523. set auto_index(tixFSDisplayName) [list source [file join $dir fs.tcl]]
  524. set auto_index(tixDetermineWM) [list source [file join $dir pref WmDefault.tcl]]